library(Seurat)
library(monocle)
library(cowplot)
wolfrum.predicted_labels <- readRDS('output/seurat_objects/wolfrum/wolfrum.predicted_labels_180831.rds')
Monocle wolfrum preadipocytes
Ran Monocle on the Wolfrum subset with the same gene list that was used to build the 180831 trajectory.
predictions <- wolfrum.predicted_labels@meta.data['predictions_pca.predicted.id']
Error: object 'wolfrum.predicted_labels' not found

rownames(df) <- states
Error in `.rowNamesDF<-`(x, value = value) :
missing values in 'row.names' are not allowed
states.prediction
n Progenitor Metabolic ECM
4 1158 0.00 1.00 0.00
1 1254 0.11 0.21 0.69
5 170 0.00 1.00 0.00
2 207 0.05 0.91 0.04
3 5 0.00 1.00 0.00
states.prediction
n 4 1 5 2 3
Progenitor 2924 0.0 0.05 0.00 0.00 0
Metabolic 5740 0.2 0.05 0.03 0.03 0
ECM 869 0.0 0.99 0.00 0.01 0
Monocle wolfrum preadipocytes integrated 180831

LS0tCnRpdGxlOiAiUiBOb3RlYm9vayIKb3V0cHV0OiBodG1sX25vdGVib29rCi0tLQoKYGBge3J9CmxpYnJhcnkoU2V1cmF0KQpsaWJyYXJ5KG1vbm9jbGUpCmxpYnJhcnkoY293cGxvdCkKd29sZnJ1bS5wcmVkaWN0ZWRfbGFiZWxzIDwtIHJlYWRSRFMoJ291dHB1dC9zZXVyYXRfb2JqZWN0cy93b2xmcnVtL3dvbGZydW0ucHJlZGljdGVkX2xhYmVsc18xODA4MzEucmRzJykKYGBgCgojI01vbm9jbGUgd29sZnJ1bSBwcmVhZGlwb2N5dGVzCgpSYW4gTW9ub2NsZSBvbiB0aGUgV29sZnJ1bSBzdWJzZXQgd2l0aCB0aGUgc2FtZSBnZW5lIGxpc3QgdGhhdCB3YXMgdXNlZCB0byBidWlsZCB0aGUgMTgwODMxIHRyYWplY3RvcnkuIAoKYGBge3J9Cm1vbm9jbGVfcmVzdWx0cyA8LSByZWFkUkRTKCdvdXRwdXQvbW9ub2NsZS93b2xmcnVtL3dvbGZydW0ucHJlYWRpcG9jeXRlX3N1YnNldC5yZHMtbW9ub2NsZS1tb25vY2xlX2dlbmVsaXN0X1QxVDJUM19UNFQ1X3Jlcy4xLjUnKQoKcHJlZGljdGlvbnMgPC0gd29sZnJ1bS5wcmVkaWN0ZWRfbGFiZWxzQG1ldGEuZGF0YVsncHJlZGljdGlvbnNfcGNhLnByZWRpY3RlZC5pZCddCnNvcnRlZF9wcmVkaWN0aW9ucyA8LSBwcmVkaWN0aW9uc1tyb3duYW1lcyhwRGF0YShtb25vY2xlX3Jlc3VsdHMpKSxdCnBEYXRhKG1vbm9jbGVfcmVzdWx0cylbJ3ByZWRpY3RlZF9sYWJlbHMnXSA8LSBzb3J0ZWRfcHJlZGljdGlvbnMKYGBgCgoKYGBge3IsIGZpZy5oZWlnaHQgPSA0LCBmaWcud2lkdGggPSAxMiwgZmlnLmFsaWduID0gImNlbnRlciJ9CnBsb3RfZ3JpZCgKICBwbG90X2NlbGxfdHJhamVjdG9yeShtb25vY2xlX3Jlc3VsdHMsIGNvbG9yX2J5PSdTdGF0ZScpLAogIHBsb3RfY2VsbF90cmFqZWN0b3J5KG1vbm9jbGVfcmVzdWx0cywgY29sb3JfYnk9J3ByZWRpY3RlZF9sYWJlbHMnKQopCmBgYAoKYGBge3J9CklkZW50cyh3b2xmcnVtLnByZWRpY3RlZF9sYWJlbHMpIDwtIHdvbGZydW0ucHJlZGljdGVkX2xhYmVscyRzZXVyYXRfY2x1c3RlcnMKcHJlYWRpcG9jeXRlX3N1YnNldCA8LSBzdWJzZXQod29sZnJ1bS5wcmVkaWN0ZWRfbGFiZWxzLCBpZGVudHM9Yyg1LCAxNCwgMjMsIDExLCAxMCwgMjEsIDIyLCAyNCkpCnByZWFkaXBvY3l0ZV9zdWJzZXQgPC0gQWRkTWV0YURhdGEocHJlYWRpcG9jeXRlX3N1YnNldCwgcERhdGEobW9ub2NsZV9yZXN1bHRzKVsnU3RhdGUnXSkKYGBgCgoKYGBge3J9CmdldF9yYXRpb3MgPC0gZnVuY3Rpb24oZGF0YSwgY29sMSwgY29sMil7CiAgc3RhdGVzIDwtIHVuaXF1ZShkYXRhQG1ldGEuZGF0YVssY29sMV0pCiAgc3RhdGVzIDwtIHN0YXRlc1shaXMubmEoc3RhdGVzKV0KICB2YWx1ZXMgPC0gdW5pcXVlKGRhdGFAbWV0YS5kYXRhWyxjb2wyXSkKICB2YWx1ZXMgPC0gdmFsdWVzWyFpcy5uYSh2YWx1ZXMpXQogIGRmIDwtIGFzLmRhdGEuZnJhbWUobWF0cml4KG5jb2w9bGVuZ3RoKHZhbHVlcykrMSwgbnJvdz1sZW5ndGgoc3RhdGVzKSkpCiAgY29sbmFtZXMoZGYpIDwtIGMoJ24nLCB2YWx1ZXMpCiAgcm93bmFtZXMoZGYpIDwtIHN0YXRlcwogIGZvciAoc3RhdGUgaW4gc3RhdGVzKXsKICAgIG5fc3RhdGUgPSBsZW5ndGgod2hpY2goZGF0YUBtZXRhLmRhdGFbY29sMV0gPT0gc3RhdGUpKQogICAgZGZbc3RhdGUsICduJ10gPC0gbl9zdGF0ZQogICAgZm9yICh2YWx1ZSBpbiB2YWx1ZXMpewogICAgCW5fc3RhdGVfdmFsdWUgPC0gbGVuZ3RoKHdoaWNoKGRhdGFAbWV0YS5kYXRhW2NvbDFdID09IHN0YXRlICYgZGF0YUBtZXRhLmRhdGFbY29sMl0gPT0gdmFsdWUpKQoJICAgIHBlcmNfc3RhdGVfdmFsdWUgPC0gbl9zdGF0ZV92YWx1ZSAvIG5fc3RhdGUKCSAgICBkZltzdGF0ZSwgdmFsdWVdIDwtIHJvdW5kKHBlcmNfc3RhdGVfdmFsdWUsIDIpCiAgICB9CiAgfQogIHJldHVybihkZikKfQpgYGAKCmBgYHtyfQpzdGF0ZXMucHJlZGljdGlvbiA8LSBnZXRfcmF0aW9zKGRhdGE9cHJlYWRpcG9jeXRlX3N1YnNldCwgY29sMT0nU3RhdGUnLCBjb2wyPSdwcmVkaWN0aW9uc19wY2EucHJlZGljdGVkLmlkJykKc3RhdGVzLnByZWRpY3Rpb24KYGBgCgpgYGB7cn0Kc3RhdGVzLnByZWRpY3Rpb24gPC0gZ2V0X3JhdGlvcyhkYXRhPXByZWFkaXBvY3l0ZV9zdWJzZXQsIGNvbDI9J1N0YXRlJywgY29sMT0ncHJlZGljdGlvbnNfcGNhLnByZWRpY3RlZC5pZCcpCnN0YXRlcy5wcmVkaWN0aW9uCmBgYAoKIyNNb25vY2xlIHdvbGZydW0gcHJlYWRpcG9jeXRlcyBpbnRlZ3JhdGVkIDE4MDgzMQoKYGBge3J9Cm1vbm9jbGVfaW50ZWdyYXRlZCA8LSByZWFkUkRTKCdvdXRwdXQvbW9ub2NsZS93b2xmcnVtL3dvbGZydW0ucHJlYWRpcG9jeXRlX3N1YnNldC4xODA4MzEuaW50ZWdyYXRlZC5yZHMtbW9ub2NsZS1tb25vY2xlX2dlbmVsaXN0X1QxVDJUM19UNFQ1X3Jlcy4xLjUnKQpgYGAKCmBgYHtyLCBmaWcuaGVpZ2h0ID0gOCwgZmlnLndpZHRoID0gMTIsIGZpZy5hbGlnbiA9ICJjZW50ZXIifQpwbG90X2dyaWQoCiAgcGxvdF9jZWxsX3RyYWplY3RvcnkobW9ub2NsZV9pbnRlZ3JhdGVkLCBjb2xvcl9ieT0nU3RhdGUnKSwKICBwbG90X2NlbGxfdHJhamVjdG9yeShtb25vY2xlX2ludGVncmF0ZWQsIGNvbG9yX2J5PSdTdGF0ZS5uYW1lcycpLAogIHBsb3RfY2VsbF90cmFqZWN0b3J5KG1vbm9jbGVfaW50ZWdyYXRlZCwgY29sb3JfYnk9J3NldXJhdF9jbHVzdGVycycpCikKYGBgCgpgYGB7cn0KCmBgYAoK